0 OPEN1,8,15,"I":CLOSE1:POKE788,52:POKE53280,0:POKE53281,0:POKE646,1
1 PRINT"[147]VOR START ZEILEN 11,12,57,60 AENDERN          UND ZEILEN 1 - 4 ENTFERNEN!"
2 PRINT"         (ZEILE 57 = DISK-ID                      ZEILE 60 = DISK-NAME)
3 [153]"        DANN PRG.  NEU SPEICHERN!":[129]I[178]1[164]39:[153]"AND";:[130]:[153]
4 [153]"     (ANLEITUNG: PRG.-ENDE MIT 'E'!)":[129]I[178]1[164]39:[153]"USR";:[130]:[155]10[171]14
10 T$[178]"(null)LENLENLENLENLENLENLENLENLENLENLENLENLENRIGHT$"
11 P$[178]"PEEK  SPREAD BY  PEEK"
12 C$[178]"PEEK  TIGERCREW  PEEK"
14 D$[178]"MID$LENLENLENLENLENLENLENLENLENLENLENLENLEN(null)"
20 [153]"LOAD":[151]53280,0:[151]53281,0
30 Q$[178]" SWAP-DISK - 4 BLOCKS FREI - EINLEGEN "
35 [153]"";Q$:[141]40:[139]F$[178]"E"[167][153]"LOAD":[128]
36 [137]35
40 [161]F$:[139]F$[179][177]" "[167] [142]
50 [160]2
51 [153]"LOAD"
52 [159]2,8,2,T$[170]",U,W":[152]2,[199](255);[199](255):[160]2
53 [159]2,8,2,P$[170]",U,W":[152]2,[199](255);[199](255):[160]2
54 [159]2,8,2,C$[170]",U,W":[152]2,[199](255);[199](255):[160]2
55 [159]2,8,2,D$[170]",U,W":[152]2,[199](255);[199](255):[160]2
57 ID$[178]"+T-C+"
58 [159]15,8,15:[152]15,"I"[170]DV$:[159]1,8,3,"#":[152]15,"U1:3"DV",18,0"
59 [152]15,"B-P:3,162":[152]1,ID$;:[152]15,"U2:3"DV",18,0
60 DN$="THE TIGER-CREW !"
61 PRINT#15,"B-P:3,144":PRINT#1,DN$;:PRINT#15,"U2:3"DV",18,0"
62 RUN